﻿Imports mikrotik.MikrotikAPI

Module sample
    Public Function Login(ByVal IPAddress As String, ByVal Username As String, ByVal Password As String) As Boolean
        Dim mk = New MikrotikAPI("192.168.8.2")
        If Not mk.Login(Username, Password) Then
            Return False
        Else
            Return True
        End If
    End Function
End Module
